home *** CD-ROM | disk | FTP | other *** search
/ Apple II Magazines (DO) / Softdisk Magazette Volume 1, No. 06 (1982-02)(Softdisk)(Side B).zip / Softdisk Magazette Volume 1, No. 06 (1982-02)(Softdisk)(Side B).do / MEMOCAP.bas < prev    next >
BASIC Source File  |  1996-12-24  |  318b  |  8 lines
  1. 10  REM  PROGRAM TO FIND AVAILABLE MEMORY
  2. 20 ME% =  INT(( PEEK(6) +256 * PEEK(7))/1024)
  3. 30  HOME 
  4. 40  VTAB 4: HTAB 11: PRINT "YOUR PAL ASMODEUS,"
  5. 50  VTAB 7: HTAB 11: PRINT "THE APPLE COMPUTER"
  6. 60  VTAB 10: HTAB 14: PRINT "*** HAS ***"
  7. 70  VTAB 14: HTAB 2: PRINT "*** ";ME%;" *** K BYTES OF AVAILABLE MEMORY!"
  8. 80  END